::llamamos a rutas.bat que tiene dentro de variables las rutas que utilizamos

::programat per Miquel Font
@echo off&call:%*&goto:eof

:mouse
call Archivos\rutas\rutas :background
call Archivos\rutas\rutas :directory
set op=
set tipo=
set ayu=

cls
type Archivos\txt\menu.txt
type Archivos\txt\pagmouse.txt
type Archivos\txt\menu.txt
echo.

set /p op=Elige la opcion que desees:
if %op%x==x goto vacio
if %op%==ant goto :eof
if %op%==1 goto dese
if %op%==2 goto dese
if %op%==3 goto dese
if %op%==4 goto dese
if %op%==5 goto dese
if %op%==H1 set ayu=1
if %op%==H2 set ayu=2
if %op%==H3 set ayu=3
if %op%==H4 set ayu=4
if %op%==H5 set ayu=5

if %op%==exit goto :eof
if not %ayu%x==x goto :Hayu
goto :error

:dese
echo.
set /p tipo=Deseas activar o desactivar una funcion?(activ/desac)
::nos sale un menu con las opciones que tenemos y a continuación dos variables que recogen los que queremos hacer

if %tipo%x==x goto vacio
if %tipo%==activ goto activar
if %tipo%==desac goto desactivar
::mediante if miramos si queremos activar y desactivar
goto error



:activar

if %op%==1 reg add %background%\Hibernar\command /ve /d "shutdown -h -f"

if %op%==2 reg add %background%\Apagar\command /ve /d "shutdown -s -t 0"

if %op%==3 reg add %background%\Reiniciar\command /ve /d "shutdown -r -t 0"

if %op%==4 reg add %direct%\Ocultar\command /ve /d "attrib +h "%%1""

if %op%==5 reg add %direct%\Mostrar\command /ve /d "attrib -h "%%1""
::tanto en activar como en desactivar, la cosa es muy similar. Con el numero que corresponde y mediante if como
::anteriormente, activamos o desactivamos lo que queremos.


pause
goto mouse

:desactivar
if %op%==1 reg delete %background%\Hibernar

if %op%==2 reg delete %background%\Apagar

if %op%==3 reg delete %background%\Reiniciar

if %op%==4 reg delete %direct%\Ocultar

if %op%==5 reg delete %direct%\Mostrar



pause
goto mouse

:Hayu
cls
type Archivos\txt\menu.txt
type Archivos\txt\H31%ayu%.txt  
type Archivos\txt\menu.txt
pause
goto :mouse



:isesion
call Archivos\rutas\rutas :run
cls
set opcion=
set nom=
set ruta=
set entrada=

::interantuando con el usuario que va a utilizar el programa pedimos que nos diga lo que quiere hacer
set /p opcion=Por favor, indiquenos si quiere anadir una entrada nueva o borrar una entrada existente(add/dele):

if %opcion%x==x goto vacio
if %opcion%==dele goto borrar
if %opcion%==add goto crear
goto error
::mediante if vamos a un sitio u otro segun lo que ha escrito
:crear

set /p nom=Escriba el nombre que quiere darle a la entrada de registro:
if %nom%x==x goto vac

set /p ruta=por favor, escriba la ruta donde se encuentre el archivo o programa que dese:
if %ruta%x==x goto vac

::nos pide que escribamos el nombre de la entrada que vamos a hacer, ya que podremos crear todas las que queramos
::nos pedira tambien la ruta donde se encuentra el archivo o directorio
REG ADD %run% /v %nom% /t REG_SZ /d "%ruta%"
echo.
pause
goto :eof

:borrar
set /p entrada=Escriba el nombre de la entrada que quiera borrar:
if %entrada%x==x goto vac

REG DELETE %run% /v %entrada% /f 
pause
goto :eof

:vacio
echo.
echo No ha introducido nada, sera redireccionado al menu Sistema.
pause
goto princ

:vac
echo.
echo No ha introducido nada, por favor introduzca una opcion.
pause
goto isesion



:error
echo.
echo Has introducido una opcion erronea, sera redireccionado al menu Sistema.
pause